Ì i 2
nur.patient.data (main)
[patient]
:NURPT[aa]
Field Name Len Dat Typ J DPM Offset/Local/VAL
patient 30 FREE L aa
acct.number 12 FREE L VAL=@ADM.PAT.acct.number
acuity.level 10 FREE L VAL=IF{@NUR.PARAM.pat.acuity.screen.query^QRY @ADM.PAT
VAL=.ccdqr.response[patient,QRY]}
admit.date 8 DATE L VAL=@ADM.PAT.admit.date
admit.date.at.time 16 FREE L VAL=(%Z.date.out(@ADM.PAT.admit.date),("at "_@ADM.PAT.
VAL=admit.time>"at "))
admit.time 4 HHMM L VAL=@ADM.PAT.admit.time
age.and.sex 10 FREE L VAL=(@ADM.PAT.current.age,@ADM.PAT.sex)
attend.doctor 10 FREE L MIS.DOC.DICT VAL=@ADM.PAT.attend.doctor
attend.doctor.name 30 FREE L VAL=@MIS.DOC.DICT.name[@ADM.PAT.attend.doctor]
bed 3 FREE L VAL=@ADM.PAT.bed
facility 10 FREE L MIS.FACILITY
last.med.edit 10 FREE L VAL=%NUR.PC.WORK.get.last.med.edit("")
location 10 FREE L MIS.LOCN.DICT VAL=@ADM.PAT.location
location.w.temp 12 FREE L VAL=IF{"t "_@OE.PAT.temporary.location'="t ";@ADM.PAT.
VAL=location}
mri.urn 25 URN L MRI.PAT VAL=@ADM.PAT.mri.urn
name 30 FREE L VAL=@ADM.PAT.name
number 12 FREE L VAL=@ADM.PAT.number
number.and.name 44 FREE L VAL=(@ADM.PAT.number_" "_@ADM.PAT.name:0S)
pt.id 43 FREE L
room 10 FREE L MIS.ROOM.DICT VAL=@ADM.PAT.room
status 8 CHOICE L VAL=@ADM.PAT.status
status.w.flags 9 FREE L VAL=@ADM.PAT.status.w.obsv_IF{@MIS.DIS.DICT.expired[@A
VAL=DM.PAT.discharge.disposition!@ADM.PAT.er.depart.di
VAL=sposition]="Y" "x"}
status.w.obsv 8 FREE L VAL=(@ADM.PAT.status_IF{@ADM.PAT.observation.patient="
VAL=Y" "o"})
unit.number 10 FREE L VAL=@ADM.PAT.unit.number
urn 30 URN L ADM.PAT
visit.date 8 DATE L
Ì 2
INDEX FILE/INTERNAL NAME SUBSCRIPTS/PHYSICAL BASE
nur.adm.room.bed.index [facility,room,bed] = patient
adm.room.bed.index *AARB[gqb,ggr,ggrB]
|
|